home *** CD-ROM | disk | FTP | other *** search
- on(press){
- tellTarget("_level50")
- {
- gotoAndStop("off");
- }
- set("_level40/sound/lib:sound",145);
- call("_level40/sound/lib:play");
- tellTarget("numBounce")
- {
- gotoAndStop("over");
- }
- myName = _name;
- if(myName eq "eql" and eval("../calcCode:lastAction") eq "num" and eval("../calcCode:lastOp") ne "")
- {
- call("../calcCode:DoOperator");
- set("../calcCode:operand1","");
- set("../calcCode:lastOp","");
- }
- else if(myName eq "sqrt")
- {
- set("../calcCode:operator",myName);
- call("../calcCode:DoOperator");
- }
- else if(myName eq "%")
- {
- if(eval("../calcCode:lastOp") eq eval("../calcCode:operator") and eval("../calcCode:lastAction") eq "operator")
- {
- set("../calcCode:operator",myName);
- set("../calcCode:lastOp",myName);
- }
- else
- {
- prevOp = eval("../calcCode:operator");
- set("../calcCode:operator",myName);
- call("../calcCode:DoOperator");
- set("../calcCode:lastAction","operator");
- set("../calcCode:operator",prevOp);
- set("../calcCode:lastOp",myName);
- }
- }
- else if(myName eq "recp")
- {
- set("../calcCode:operator",myName);
- call("../calcCode:DoOperator");
- }
- else if(eval("../calcCode:lastOp") eq eval("../calcCode:operator") and eval("../calcCode:lastAction") eq "operator")
- {
- set("../calcCode:operator",myName);
- set("../calcCode:lastOp",myName);
- }
- else
- {
- call("../calcCode:DoOperator");
- set("../calcCode:lastAction","operator");
- set("../calcCode:operator",myName);
- set("../calcCode:lastOp",myName);
- set("../calcCode:operand1",eval("../calcCode:display"));
- }
- gotoAndPlay(25);
- }
-